home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / 422mods.zip / SYSEXCU.422 < prev    next >
Text File  |  1993-02-18  |  2KB  |  46 lines
  1. Random Sysop Excuses
  2. Black Magic #70 @13651
  3. Sun Feb 14 11:23:24 1993
  4. Stratosphere #306 @6953
  5. Sun Sep 27 20:29:00 1992
  6. /*
  7.  * ST001.MOD   // Random "not available" message.
  8.  * 
  9.  * In the information shown after login, "Sysop is  : NOT available" is
  10.  * replaced by one of several random phrases.
  11.  * 
  12.  * Files     : LILO.C                   Version: 4.21 
  13.  * Difficulty: Quayle could do it.
  14.  */
  15.  
  16. Standard disclaimers:  Backup your source first, if your HD crashes it's not
  17.                        my fault, etc.  
  18.  
  19. File: LILO.C
  20.  
  21. Search for:
  22.     npr("Sysop is         : %sAvailable\r\n",sysop2()?"":"NOT ");  
  23.  
  24. Delete that line, and replace it with:
  25.  
  26.     if (!sysop2()) {                            /* begin mod */
  27.       i1=(rand() % 5);             /* '5' can be another number... it's the */
  28.       switch (i1) {                /* number of excuses you have.           */
  29.          case 0: strcpy(s,"Not available.  Really. "); break;
  30.          case 1: strcpy(s,"Hiding."); break;
  31.          case 2: strcpy(s,"Dead."); break;
  32.          case 3: strcpy(s,"A prisoner of the Klingons."); break;
  33.          case 4:                   /* '5' -1 */
  34.          default: strcpy(s,"Gone.....");
  35.       }
  36.     } else { strcpy(s,"Available."); }
  37.     npr("Sysop is         : %s\r\n",s);           /* end */
  38.  
  39. Don't forget to format that last npr() so that it lines up with the other
  40. information printed, and is the same color.  You can change colors by 
  41. adding ^Cdigit within the string.  While you're here, change the colors of
  42. the lines above... the default grey is boring.
  43.  
  44.                                                       5S2trato5S2phere
  45.                                                       7-Have fun!-
  46.